home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / pibt32s3.arc / PIBVT220.PAS < prev    next >
Pascal/Delphi Source File  |  1985-11-07  |  185b  |  7 lines
  1. OVERLAY PROCEDURE Emulate_VT220;
  2.  
  3. BEGIN (* Emulate_VT220 *)
  4.    WRITELN;
  5.    WRITELN('VT220 emulation not yet available.');
  6.    DELAY( One_Second_Delay );
  7. END   (* Emulate_VT220 *);